CAAPrecession_PrecessEquatorialFK4 <-
function(Alpha, Delta, JD0, JD){
.Call("CAAPrecession_PrecessEquatorialFK4", Alpha, Delta, JD0, JD)
}
